(byte-optimize-form-code-walker): Fix previous change.

diff --git a/lisp/emacs-lisp/byte-opt.el b/lisp/emacs-lisp/byte-opt.el
index cbfc5c7d800d3a5d99beff327b41f982e727f0cb..64280a4d549f0ebf1c9a4f329894c672df9ce8f5 100644 (file)
--- a/lisp/emacs-lisp/byte-opt.el
+++ b/lisp/emacs-lisp/byte-opt.el
@@ -511,8 +511,7 @@
          ;; Support compiler macros as in cl.el.
          ((and (fboundp 'compiler-macroexpand)
                (not (eq form
-                        (setq form (compiler-macroexpand form
-                                    byte-compile-macro-environment)))))
+                        (setq form (compiler-macroexpand form)))))
           (byte-optimize-form form for-effect))
          
          ((not (symbolp fn))